object Form1: TForm1 Left = 200 Top = 95 BorderStyle = bsDialog Caption = 'GRID' ClientHeight = 476 ClientWidth = 635 Font.Color = clWindowText Font.Height = -13 Font.Name = 'System' Font.Style = [] PixelsPerInch = 96 OnCreate = FormCreate OnPaint = FormPaint TextHeight = 16 object ScoreText: TLabel Left = 24 Top = 448 Width = 185 Height = 25 AutoSize = False Caption = 'ScoreText' Font.Color = clBlue Font.Height = -21 Font.Name = 'Comic Sans MS' Font.Style = [fsBold] ParentFont = False end object LivesText: TLabel Left = 248 Top = 451 Width = 105 Height = 25 AutoSize = False Caption = 'Lives:3' Font.Color = clBlue Font.Height = -21 Font.Name = 'Comic Sans MS' Font.Style = [fsBold] ParentFont = False end object Hightext: TLabel Left = 416 Top = 451 Width = 185 Height = 25 AutoSize = False Caption = 'HiScore:12560' Font.Color = clBlue Font.Height = -21 Font.Name = 'Comic Sans MS' Font.Style = [fsBold] ParentFont = False end object Up: TBitBtn Left = 680 Top = 176 Width = 49 Height = 41 Caption = '&aup' TabOrder = 0 OnClick = UpClick end object down: TButton Left = 680 Top = 256 Width = 49 Height = 41 Caption = '&zdown' TabOrder = 1 OnClick = downClick end object Left: TButton Left = 664 Top = 216 Width = 41 Height = 41 Caption = '&,left' TabOrder = 2 OnClick = LeftClick end object Right: TButton Left = 704 Top = 216 Width = 41 Height = 41 Caption = '&.right' TabOrder = 3 OnClick = RightClick end object Timer1: TTimer Interval = 1 OnTimer = Timer1Timer Left = 343 Top = 122 end end